home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 22 / PC Actual CD 22.iso / progs / DIRECTOR / data.z / Scriptable Authoring.dir / Scripts_43_Turn on the puppets for the Float and Band selection.ls < prev    next >
Encoding:
Text File  |  1997-05-10  |  794 b   |  16 lines

  1. global gPuppetList, gFloatName, gBandName
  2.  
  3. on exitFrame
  4.   PuppetFloatAndBand(1)
  5.   set firstSprite to the aquaFloat of gPuppetList
  6.   set secondSprite to the cosmosFloat of gPuppetList
  7.   set thirdSprite to the tropicanaFloat of gPuppetList
  8.   set floatSprite to getaProp(gPuppetList, gFloatName)
  9.   SelectRadioButton(floatSprite, "Create Cast Radio Button On", "Create Cast Radio Button Off", [firstSprite, secondSprite, thirdSprite])
  10.   set firstSprite to the royHarperBand of gPuppetList
  11.   set secondSprite to the hanksVoodooBand of gPuppetList
  12.   set thirdSprite to the nightbloomersBand of gPuppetList
  13.   set bandSprite to getaProp(gPuppetList, gBandName)
  14.   SelectRadioButton(bandSprite, "Create Cast Radio Button On", "Create Cast Radio Button Off", [firstSprite, secondSprite, thirdSprite])
  15. end
  16.